|
CATIA V5 Programmierung : EXCEL Data Einlesen mit CATIA V5 VBA
s1640066 am 29.06.2006 um 12:08 Uhr (0)
Versuche es mit folgendem Codebaispiel:(der Anwender wird gfragt ob er seine Werte von der Tabelle laden will wenn ja dann wid er aufgefordert seine Tabelle zu wählen..)angelload = MsgBox("Wollen Sie Ihre Winkelwerte aus einer Excel-Tabelle laden [ja]" + Chr(10) + "oder sollen die Standard werte für Stahl übernommen werden [Nein]?", vbYesNo, "Winkelbvergleichswerte") If angelload = 6 Then wenn ja dann wählt er in einer Box seine Tabelle aus Set objXL = CreateObject("Excel.Application") datei = CAT ...
|
In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : CATIA-Part oder Produkt erkennen
s1640066 am 19.07.2006 um 14:43 Uhr (0)
Hallo an alle,ich benötige einen code in dem das Makro am Anfang des Durchlaufs erkennt ob das Document ein Part oder ein Product ist. Und wenn das aktive Dokument ein produkt ist, wie erkenne ich welcher Part in dem aktiv ist?.. ein kleiner code in CatScript wäre sehr hilfreich.
|
In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : CATIA-Part oder Produkt erkennen
s1640066 am 20.07.2006 um 09:50 Uhr (0)
Vielen Dank! Zitat:Original erstellt von Lusilnie:Hallo s1640066,der "Erkenn-Code" ist einfach und heißt:Code:If TypeName(CATIA.ActiveDocument) = "PartDocument" Then ...oderIf TypeName(CATIA.ActiveDocument) = "ProductDocument" Then ...und Deine zweite Frage ist ein "Klassiker" im Forum (- schon mal Suche bemüht?) und die Antwort lautet: "Kennt das Script nicht!", d.h. ist für die Macro-Programmierung ohne Bedeutung!mfg,Lusilnie
|
In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Kopy of / kopie von
s1640066 am 22.08.2006 um 17:24 Uhr (0)
Gruss!!ich habe ein Makro was "Copy of" beseitigt!Sub CATMain()Set partDocument1 = CATIA.ActiveDocumentSet selection1 = partDocument1.selectionselection1.Search "Name=Copy*,all" For Counter = 1 To selection1.Count Set oItem = selection1.Item(Counter) mystring = oItem.Value.Name subString = Mid(oItem.Value.Name, 1, 8) Do While subString = "Copy of " oItem.Value.Name = Mid(oItem.Value.Name, 9) subString = Mid(oItem.Value.Name, 1, 8) LoopNextEnd Su ...
|
In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : aktives PartDocument im ProductDocument deklarieren
s1640066 am 13.09.2006 um 10:50 Uhr (0)
Super! Danke!brauchst du nicht zu schicken hack mir in meinen Code das Nötige, wenn es sein sollte!************************************************************* Set sel = CATIA.ActiveDocument.Selection If TypeName(CATIA.ActiveDocument) = "ProductDocument" Then MsgBox "Bitte das PartDocument in dem die Geometrie erzeugt werden soll aus dem CATIA-Baum selektieren" Dim docutype(0) docutype(0) = "Part" Status = sel.SelectElement(docutype, "Bitte Part auswählen, Abbrechen mit Esc", True) If Stat ...
|
In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Formel löschen?
s1640066 am 20.09.2006 um 14:27 Uhr (0)
Halloich habe das Problem auch gehabt. Du kannst die Formel mit CATIA.ActiveDocument.Selektion selektieren und löschen.. ein Tipp Formel vor Parameter selektieren!!Dazu ein Beispiel:set sel= CATIA.ActiveDocument.Selektionsei der Variablenname deines Parameters param1und der deiner Formel formula1sel.Clear vorige Selektion anulierensel.Add fomula1sel.Add param1sel.Deletefertig!!;-)
|
In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Geometrische Daten eines Assemblys nach Excel ausschreiben
s1640066 am 04.10.2006 um 09:19 Uhr (0)
ich habe da etwas ähnliches, das aber Annotations-Werte von einem Produkt in Exel setzt. Du kannst den Code zum großen Teil übernehmen und auf deine Parameter umbauen.... Bei dem Makro muss eine leere Tabelle in Exel schon vor dem Start geöffnet sein.Dim oSel As ObjectDim oParts() As ObjectDim sAnnotationTexte() As StringSub CATMain() Set oSel = CATIA.ActiveDocument.Selection Dim oRead_Elements() As Object ReDim sAnnotationTexte(0) ReDim oParts(0) ReDim oRead_Elements(0) oSel.Clear On Error Resume ...
|
In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : part im product selektieren
s1640066 am 05.04.2007 um 10:15 Uhr (0)
Mit diesem Problem habe ich eine Weile zu Kämpfen gehabt. ich habe ein kleines WA. dazu entwickelt.ich hoffe das hilft dir weiter.ich habe es allerdings rekursiv. dh. du musst es in dein Makro als Unterroutine einbauen.... hier der QellcodeSub docuanalyse() Dim Status As Object sel.Clear If TypeName(CATIA.ActiveDocument) = "ProductDocument" Then MsgBox "Bitte das PartDocument in dem die Geometrie erzeugt werden soll aus dem CATIA-Baum selektieren" Dim docutype(0) docutype(0) = "Part" Status ...
|
In das Form CATIA V5 Programmierung wechseln |